object Exp: TExp
  OldCreateOrder = False
  Left = 395
  Top = 251
  Height = 136
  Width = 234
  object OldExp: TSQLDataSet
    GetMetadata = False
    CommandText = 'select * from RDB$EXCEPTIONS'#13#10'where RDB$EXCEPTION_NAME=:ENAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'ENAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.OldDB
    Left = 16
    Top = 32
  end
  object NewExp: TSQLDataSet
    GetMetadata = False
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 32
  end
end
